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VOLUME 8, NUMBER I JANUARYIFEBUARY 1989 


Monthly meetings of S.B.A.C.E. the Final Frontier for § | T he 
Atari users, are held on the second Tuesday of the fj 
month, at 7:30 PM. The meeting location is: Editor’ S. 


VFW Hall See : 
~ 1865 Lomita Blvd | _ Keyboard 
Lomita, CA 


by Bill Little 


Monthly ST meetings are held on the last Monday of 
the month, at 8:00 PM. The meeting location is: 


Lawndale Community Center | Twas the week after Christmas 
15331 Prairie Ave. | And all through the house 
Lawndale, CA : This editor was not editing 


Never touched his Atari's mouse 


SBACE OFFICERS 

Board members: (all 213 area codes unless noted) A festive week it was 
President............0... a Jerry Bransford 325-6204 Just a lot of holiday partying 
Vice President .......0...-.cc Eugene Bienko 534-3984 _ it was obvious to all 
Recording Secretary ........... Daniel Prince 327-6147 | That | had neglected my fellow Atarians 
Tr@ASUrelr............s0.. ce ae Brian Eliassen 818-798-2744 | 
Librarian (8—bit)................--- Bob Lehmker 530-4071 several articles had been submitted 
Newsletter Editor .....0.0..0000..... Bill Little 217-0725 But a quick review had shown 


Appointed positions: Many different word processors were used 


More then to this editor is known 


Corresponding Secretary... Dick Reaser 645-7063 
Magazine Librarian ere Daniel Prince 327-6147 : 
ST VP/Librarian occ. Alan Haskell 542-7870 _ | had just settled down 
Asst. Newsletter Editors ...... Brian Eliassen 818-798-2744 To some basic computer fun 
Bob Gillies 771-5309 Dungeon Master, Dragon Lance and others 


Were about to be run 


‘When all of a sudden 
There arose such a clatter 
_ tran to the front door 
To = ee was & matter : | 


Didr my eyes behold ee 
Wy it was my fellow club officers | 
| - Acting real bold 


Jerry Bransford was in the lead. 
Quite fashionably dressed 
He made a loud racket 


PG NO CHAS (UG OS gsi where some discussion took place regarding combining _ 


the general and the ST~sig meetings into one meeting or — 


Come Bienko, Haskell, Reaser and Prince 


Come Lehmker, Eliassen, Gillies and Knauss. 


Let us find out 


Why that last issue was lost 


| Jerry laid a finger 
To the side of his nose 
And | found myself surrounded 


We were ail standing toe—to—toe 


Now look here guys 
See it my way 
_ And I could see that my words 


Were beginning to sway 


Ok there mister editor 
You have calmed our fears 
But you better start producing 


Lets see six issues next year 


Yes yes | promise 


All six issues this time 


_ As long as more club members contribute 
eens will be fine 


Deep i in thought | was — | = 
On what my fellow officers had to ~~ ne 
ee fie. = ~ few see on oo 


with ‘ssbiogia to the orginal) 


A BELATED HAPPY HOLIDAYS TO ALL MY FELLOW 
S.BACE. CLUB MEMBERS | 


| IMPORTANT ANNOUNCEMENT 
| have just returned from the January general meeting | 


maybe trying to find a cheaper place to hold the General 
meeting (we currently pay $35 a month for the VFW hall). 
More discussions and a possible vote will be held at the 
next general meeting. If you have an opinion on this topic 
be there or let a club officer know your feelings. 


Article Submittal 


| need to have articles in machine readable os 18) | can 
correct errors and fit them into my desktop publisher. | will 
accept short letters to the Editor or classified ads in 
printed or neatly handwritten form. | prefer that articles are 
transmitted to the TORRANCE FOREM at 320-1541. to 


P.C. HEAVEN at 374-7929 or to the SWAMPS BBS at 


324-0218 (8-bit uploads only). These BBS’s support 
F—mail so you can upload a file directly to me. Please 


include your name in the article you submit so | can give 


credit where credit is due. | will be checking these BBS’s 
every week or so and will try to leave you a message 
using E-mail when | have received your file. Please call 
me at 217-0725 if you have a question or if you want to 


tell me that you have uploaded an article. You can also 


give me articles on disk at the meetings (8-bit or 16-bit) 
or call me to make a special arrangement. 


Member’s Classified Ads 


As a service to our club members we will place short 
classified ads in this newsletter to help you sell/trade/buy 
computer equipment and/or software. Contact me at 
217-0725 


*** SUBMIT ARTICLES — SHARE *** 


THE ATARI/FEDERATED USER 
| GROUP MEETING — 


After the success of two fine Atari shows in Glendale in— 


two successive years, we were ali = our Oats, as den 
old men say. — 


ee When ‘Sigmund Hartman, the leeaguaies Vice President of = 


Souther California ferndies acted as the maestro of the 
show and it was very impressive. 


Sounds like something out of the Godfather doesn’t it? 


Well no, it wasn’t Appalachian. We met at the Pickwick 
Convention center in Burbank on the bright, sunny, early 
noon of November 5th and stuffed ourselves with plenty of 
- Coca Cola and coidcuts. Sig brought along his enforcer, 
‘Wayne Smith (now isn’t that an alias for you?) who is the 


Southern California Sales Manager. Each of us was given 


o one question and, even with this limit, the afternoon was _ 


waning into the gloom by the time Big John cut it off. 


Four door prizes were raffled off and yours truly won a 
copy of Microsoft Write for SBACE which will be passed 
on to some lucky person at a ST-SIG meeting soon. 


some of the things Sig Hartman said had previously 
been said at Glendale and other places. He made these 
statements sound very convincing. | think he is a very 
effective ambassador for such a potentate as Jack T. 
Whether he can deliver only time will tell, but | think he is 
sincere. He said that four years ago the Apple Macintosh 
had an impressively large booth at the Hanover electronics 
show, one of the biggest shows of its type in Europe. Last 
year they were hardly represented. Atari had become the 
- European standard. This had led Atari to become the 

Fortune 500 company it now is. This is an indication of the 
Stability and health of Atari. However, this has cost. The 
lack of facilities, the shortage of chips, and the unwilling- 
ness to grow too big too soon, has meant there has not 
been enough hardware to meet the demands of the United 
States market. He agrees that this may have been a 
mistake, considering the already established base of Atari 
computer users in the US, but this is water over the dam 
and he predicts that the ST family of computers will 


become a standard here as it is in Europe, possibly as 


soon as next year as they pian to make a large advertising 
push in the next few months. 


A solid base of dealers is of paramount importance but 
Atari is intent upon having only those who can show they 
have the dedication to Atari products and repairs. He 
mentioned that Atari is looking for competent people to 
_ hire and hopes to see some resumes. He is also interested 
in hiring Atari-knowledgeable people for the Federated 
Group. He has been made fully aware of the dissatisfac— 


tion Atari 


ialo ue, it sounded $ like a new ‘beginning, De 
inian, the bat de Tutti Capi of ail the 


owners have with the Federated’s sast 
employees. Sig is responsible for user group interface on | 
top of all of his many other hats. This is certainly a change 
for the better. Warner managed to almost totally obscure 
any attempts at communication with Atari by user groups 


_such as we had for a short time with the assignment of 


Earl Rice for a while in the early ‘80’s. Sig will continue to 
travel to local groups such as were at todays meeting. and 
can be reached by phone at 408-745-2906. | know it 
works as | wrote him and he called me at home, getting 
my machine. | called him and got his secretary. He 7 
returned the call within two hours. — 


Atari intended to support the 8—bit line more fully in the 


future. Sig plans to make A-DOS available to all of the 


user groups through the presidents of the groups. Now 
don’t you wish you had been nicer to me, eh? The Atari 
PC is now available in Europe. He was not sure when they 
can get it into US showrooms. He had much ‘more to say , 
than we have space here for. 


Sig introduced a San Jose police sergeant Named David 
Flory. Dave has managed to get the ST into a centrai 
position in the data processing of crimes. They have four 
Mega-—4’s and are rapidly becoming a Bay Area resource 


on computer crime itself. Diagrammatic ‘ilustrations ~ 
crime scenes for tnal use are generated on the Atan 9) 
sorts of crime related data~base uses for the Atan 


made themselves known. Dave is a SISOP on GENIE toa. 


The general feeling was that we are now seeing a new 
relationship with Atari, a sort of Glasnost. | certainly hope 
so. Since | bought my first Atari computer, an 800 with 3k 
of RAM, in 1981, | have felt that we had the fires! 
electronics available coupied with the most abysroaiy 
ignorant customer interface it was possible to have to deal 
with. Our hope that this changed with Warner’s exit was 
dimming when Sig Hartmann came back on the scene and — 
began to play on our heartstrings. Keep it up, Sig! 


Gerald J. Bransford, roving romanc...er (ahem!) reporter 


COMDEX/Fall ‘88, 
November 14-18, 1988, 
_Las Vegas. 


Hah! I’m back. Thought | was gone? ! was only visiting 
the mob in Sin City, Nevada, ...cops, sorry, Lost Wages 
Nevada. This is where it only cost me about $150.00 to q> 
the free Comdex show. The ticket was free but | had to ge’ 
across 300 miles of assorted desert, mountains, 
people, etc. For any neophytes out there, Comdex = * 
super trade show for the electronics business. It ie oe 
really open to you and me. | pulled rank, however; as \ 
chief executive, | became sort a hybrid. Not truly one 
them and not simply a consumer. 


~ Comdex occupied the entire Convention Center as well — 


as the display space and many rooms in West Hall, Bally's, 
Caesars Palace, Hilton, Riviera, Sahara and Cashman Field 


Center. There were over 17,000 exhibitors, some of whom 


occupied as much space as 10,000 square feet and had 


, special effects to put the film industry to shame. Atari had 
= their own special yee are off lina main Orrnnes. to the a 


had a stage too. In fact, sertior: covarton Hal main Hoo, + 
Fleetwood Mac, played live for the Atarians gathered 


there. 
The room was divided into cokipitmenis using the sort 


of 5-foot dividers you see in large offices (fabric covered 


panels). At the right as you entered you found the three 


major desktop publishers, all with Mega machines and = 


laser printers. One of them had a Viking “Moniterm” 19° 
1280 X 960 resolution monochrome monitor. There were 
Vikings several other places too. Most of the equipment 


was being operated by members of the two local Atari 
user groups as some of the vendors had left by Friday, the | 
day | managed to schlep myself in. Several specialized — 


applications of the computer were demonstrated such as 
medical management, etc. A double sided printed circuit 
board layout program was being shown. Two scanning 
demonstrations were available. The Canon Scanner used 
with the Navarone software (best for text, | understand) 


and the not-yet-available $300 device that fits on the HP 


Deskjet to scan in 300 dot resolution (this from Seymor/ 
Radix). A couple of CAD programs were there but the 
stations were not working. There were two different Atari 
PC computers showing high res color graphics, and two of 
the T800 workstations with the Inmos Transputer, develo— 

ped by the Brits in conjunction with Atari, which are 
capable of 10 million instructions a second. They are rated 
at 1.5 megaflop (for those of you interested in esoterica). 
They have 1280 X 960 color resolution with 4096 colors. 
Other combinations are available. | missed the laptop 
computer. | understand the prototype (mockup?) failed or 
broke on the first day and spent the rest of the week in the 
hotel room as punishment. 


Other than the glow of so many megacomputer monitors, 
there was little in the way of “glitz” to grab the casual 
passerby. Of course, Atari was not looking for such casual 
interest or they would have been on the main floor with 


Mac and the boys. My initial feeling was disappointment at — 


the casual environment. Several “Power without the Price” 
banners, etc. on the walls were all that identified the 
display. | quickly became optimistic and decided that they 
were using the money to make better hardware, rather 
than grabbing people by the eyes. Hooray for them. 


| left LA on the 7:35 AM plane and arrived back home at 
just after midnight. | probably had walked ten miles that 


4 


88). A new operating 


day, attempting to get some answers about IBM and Mac 


for my bosses at Hughes Aircraft Company, however the 
quality time was the period | spent in the Gold moom with 


my friends the Atarians. 


Gerald J. Bransford, Chief Executive and odd jobe done 
emer 


% F What's Gnu 
(11/06/88) . 
by Dick Reaser 


DOSs, John Brandt (SLCC Journal 8-88). A histori— 
cal review of DOS1, DOS2.0S, DOS2.0D, DOSS, | 
DOS4, ASOS, OS/A+v1, OS/A+v2, DOSXL, OS/ > 
A+v4, MYDOS, SmartDOS, SpartaDOS, Top- 
DOS, & SUPERDOS. ae 


Diamond, Reeves Software (HISUG 8- 
environment for the 8- 
BIT which includes Diamond Write, Diamond 
Paint, Diamond Publish, Diamond Draw, Dia- 
mond Basic, Diamond Asm & Diamond C 


Discovery Cartridge System, Happy (BAAUG 8- 
88). 12 page press release information. 


Hurricane Tracker, Bill Kithas (HACE 6-88). An  appli- 
cation program using Harry Koon’s Mapware. 


RS-232 to TTL Translator Circuit, Rich Grat- 
zer (PSAN 8-88). A hardware project with schema- 
tic and parts list. 


HP DeskJet Printer, Mike Hall (PSAN-6-88). A review. 


Free Magazines, Joseph Adato (Keeping PACE 7- 
88). A list of names and addresses to write to. 


SuperDOS 4.4, Donny Arnold (DAL-ACE 5- 


88). A review. 


Desk Top Publishing on an 8-BiT, Bob Wool- 
ley (SLCC Journal 9-88). Using AtariWri- 
ter + and the HP DeskJet printer. 


PR:Connection, WK Whitton, (RAAUG 9-88). Hard- 


ware modification to make it compatible with AtariWri— 


ter +. 


(For those of you that are new to the club the What's 
Gnu column is compiled by corresponding secretary Dick 
Reaser. This column references a selection of interesting 
articles from other club’s newsletters. If there is something 
here that you would like to read then contact Dick Reaser 
to insure he brings the article to the next club méeting for 
you. — editor) 


> Here s a list, know how you like them: 


Programming the ST: | 
XBIOS the Numbers __| 
S 2 a — 


2 © Welcome: back: Thie time out we're. going 10 tal Per 
four XBIOS calls, all of \ 


line. Or a letter, that might be easier. 


Have you ever designed a game that just doesn't move 
fast enough to avoid flickering? it seems the ST just can't — 

erase and re—draw the graphics fast enough for the human — 

eye to. miss it. The —— is a combination of Oe s a: 


~ through 5. 


"_ XBIOS(2) The physical base of the graphics screen 

| XBIOS(3) The logical base of the graphics screen 
XBIOS(4) The resolution of the graphics screen 
XBIOS(5) Set all the above junk | | 


First, let's define physical and logical bases. “Physical 
base” is the memory that the ST displays on the screen, 
“logical base” is where all the drawing commands work. 
So it is possible to set them to different points in memory, 
draw all your graphics, then flip that part of the memory to 
the screen. Bingo, no flicker. “Resolution” is the current 
resolution the ST is in and, yes, you can change it from 
within a program. 


The first thing you need to do to set up “page-—flipping” 
(what you do when you draw off-screen, then make it 
visible) is make enough space available for the second 
screen in memory. In GFA BASIC, strings are good for this. 
Unfortunately, the screen must be on a 512 byte 
boundary, but that’s easy enough to take care of: 


Screen$=Space$(32512) ! 32000 for the screen, 512 for 


overhead 


Screen%=(Int(Varptr(Screen$)/512)+1)*512 ! 
boundary 


Move to 


Now, Screen% holds the address of the alternate screen. 
Now we need to get the address of the original screen. 


Original%=Xbios(2) !| Could use 2 or 3 ‘cause they 
Originally | point to the same thing 


So, if you now call XBIOS(5) you can set the physical and 
logical bases to the separate screens. The following code, 
when used with the variables from above, create two 


ae hich are related to each other “a = oa ne 

are: principally useful for graphics. This might get a litte "This a ctua 
complex, so if you have trouble understand anything, just 

ask questions at the next meeting or drop the Gazette a 3 


ao separate screens that flip back and forth, each with it’s — 


own picture. Obviously, this is not the only use, you can 
have the same background in each screen, then animate « 


man running across it. Since the man is draw off-screen. 


he won t — as these examples don't. 
rae 


ip he addresses back oc forth between the screens 
ity | sets ihe : screens i 
‘Void Xbi0s(5, L:Sereen%, L:Original%, 4) 
* Draw a random picture: 
perth Random(15) | 
- Pbox Random(320), Random( 198) Random(320), Random(199)_ 
Arases the Siow it down a bi 
Loop... = 


The L's i in ‘the XBIOS sa MO vital, They tell the computer 
that the following variables are /ong words, 32-o% 


: oo parameters pointing to a memory location. Otherwise, the 
 hone-too—bright one will assume ‘homal 15M | 
ve words and crash. : | . 


Also, if you break the program, the computer will just 
stop, no GFA “Stop program?” dialog box. This is because 
you're only seeing the physical base, the dialog box drew 
on the logical base screen. Hit RETURN to get back to the 
editing screen. You might want to save the original value= 
of XBIOS(2) and XBIOS(3) and then restore them wher 
you quit the program. Using GFA’s On Break is good for 
this. 


You may be wondering what that —1 is doing in there 
Remember that | said we'd be able to change the 
resolution from within a program? That's what that’s for 
There's a few drawbacks: You can't switch monitor types. 


~ $0 you're limited to switching between low and medium 


resolution. Also GEM has no idea what you've done (since 
XBIOS is a system call) so all windows, dialog boxes, alert 
boxes and file selector will be messed up, but all the other 
commands work just great... Except COLOR and DEFFIL. 
COLOR and DEFFIL still think they’re in the previous 
resolution, so if you go from medium to low, you'll only be 
able to set four COLORs and DEFFILs. But if you're 
loading NEOChrome pictures or clips, they show fine. 
since the values are preset for low res. 


Here’s the codes for the resolutions: 


Code: Resolution: 
0 Low 

1 Medium 

2 High © 


If you’re using a color monitor and set the resolition «> 
high, you'll reboot the computer, like pressing the rese° . 
button. Same if you’re using a monochrome monitor. 4° 


You can also use XBIOS(4) to ch check which resol ms : 
you are currently in. If you don’t want to lat peop in pene | stand and easy to oe oat Pascal. in ‘er werd ta 
assembly language knowledge is required. — ae 


The source code (Listing 1 and Listing 2 for the tw a 

programs is pretty thoroughly documented, but there area 

few things that warrant a little discussion. First, both 

programs take about four minutes to execute. The reason 

for this has to do with how the copy function was 

-. implemented in the Kyan Pascal “include” file. Kyan 

- Pascal copies things one sector at a time rather than 

- | ae rome a whole file into ram and then wig it to the 
= That's it for this time, kids. Remember, te ~ way e& - ior ami, 

hurt a computer through the computer is with a hammer, 


set the resolution lower. ois | 
So if you call... 
Void Xbios(5, E+1,.-1 ,Resolution) 


you can change the resolution. to your liking. Need ee 
low res Degas picture on one screen and 80 columns on 


. another? Just flip. between low and ove ds _ _ rn 


program if they're not in, a low res... 
If Xbios(4)<>0 then 


| Alert 1,”"You need to be. in jowiresolution, bone- 


head?’’,1 
‘System 
End: 
_.will take care of it, | 


OSPR xX 


so... play around! 
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RAMMIT 
by | oS 
Rick ‘‘I’m Also Perfect’ Reaser © 
26 November 1988 


KYAN PASCAL RAMDISK CONFIGURATION ON THE 
| ATARI 130XE 


After programming for about a year with Kyan Pascal on 
my Atari 800, | was pretty anxious to use the extra memory 
in my new Atari 130XE. Kyan Pascal supports a ramdisk 
and the manual recommends putting a lot of system files 
and parts of the KIX environment utility files on the 
ramdisk. | had written some extremely long programs for 
class that took an incredible amount of time to compile, 
debug, recompile, etc. The ramdisk was definitely going to 
same me a lot of time in future programming efforts. 
Copying the files into the ramdisk prior to a programming 
session was fairly keystroke intensive, so one of my first 
projects on my new 130XE was to write a program that 


names 


‘The results are programs 


. S famciak and t instal the compiler, other -aystom files, and oe 


some KIX utilities , aoe 
in their stead. Actually. ‘the source code can be easily 


modified and recompiled to meet user specific needs. My 
objective was to write the program entirely in Pascal. With — S 
_ the help of some “include” files from the Kyan- System 
Utilities: Toolkit |, and two Kyan Pascal unique program 


ments (chain and pointer). | was able to do just that 


, but S TOE optimal for large file sanalerk Second you pee oo 


remember reading in the DOS 2.5 documentation that in 
order to truly delete DUP.SYS from the ramdisk, you need 
to POKE an ‘‘1” in a location 5439 of ram-resident DOS. If 
you don’t do this, DOS will try to find DUP.SYS on the 
ramdisk when it really isn't there and your system will 
crash. (Power cycle restart required.) Kyan Pascal doesn't 
have PEEK and POKE commands like Atari Basic. 
Assembly language Pascal routines for PEEK and POKE 
are given in the manual, but the “pointer” command will 
work just fine in this case. Fortunately, you can write a 
printable character (‘1" in this case) to the location. If you 
had to write a decimal code between 128 and 252 
(essentially non-printable ATASCII characters) additional 
programming gymnastics would be required to keep things 
in Pascal. Remember that when you call DUP.SYS by 
typing DOS while in KIX, DOS needs to be in all capital 
letters. You may hear some terrible “grinding” noises 
when you do call DOS (actually DUP.SYS) after deleting it 
from ramdisk, but don’t be alarmed. 


To modify the program so that different Kyan utilities are 
deleted or added on the ramdisk, simply change the 
in the assignment statements for the 
source filename and dest_filename. You may have to 


~ adjust some of the counters. 


automatically configures the ramdisk. This article will — 


discuss two versions of the resultant program. The first 
program, “rammit,” is designed to run from the KIX 
environment. The second program, “autoram,” which is a 
slight variant of “rammit,” is designed to be an autoboot 
program. | 


Both programs delete dup.sys and mem.sav from the 
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A few special notes are required for the autoboot version | 
(autoram) of this program. To make the program autoboot, 
CAT it with automake and name it autorun.sys as 
described in the Kyan manual. Stdlib.s should be deleted 
from system disk (side) 1 and lib should be put in its 
place. The current autorun.sys file which contains the KIX 
shell should be renamed KIX.BIN. Insure that stdlib.s is on 
system disk (side) 2. It should already be there, but check 


| anyway. Make sure that RAMDISK.COM is on the disk with 
the new autorun.sys file. if you go into DOS during a 


programming session, you recall the KIX environment by 


‘binary loading KIX.BIN (remember the file has been 
renamed.) One final note about the chain statement at the 
end of autoram. It may not be required. After a Kyan 

oo Pascal prograrit executes, i ou are ferrets ‘aes back into 


inthe following source code listings and comments. 
_ For those of you with SpartaDOS 3.2, all this can be done 


with a fairly short BATCH file. SpartaDOS also supports 
_. double density which is also nice. One shortcoming is that 
the disk drive will always “go to sleep” twice during 
- program compilation. More to follow on the —— : 


o _— Fence connection it in a chee! — 


= Software inc. ppoesiso pd is a ffackeriark of ICD, ag 


Rick Reaser, 16 Glen Lake Drive, Pacific Grove, CA 
93950. Home (408) 647-1096. School (408) 646-2772 


(NOTE: THE FOLLOWING PROGRAM LISTINGS 
ARE NOT INDENTED PROPERLY — YOUR PRO-— 
GRAM LANGUAGE’S EDITOR WILL FORMAT THIS 
CORRECTLY WHEN TYPED IN. — editor) | 


LISTING 1 


program rammit (input, output): 

(* Author: Rick Reaser. (408) 647-1096 

Date: August 30, 1988 | 

Description: This program configures the ramdisk on a 130XE to provide 
an efficient environment while programming with Kyan Pascal. The 
program automatically deletes the following files from the ramdisk 
(D8): 

1. dup.sys 

2. mem.sav 

and installs the following routines in their stead: 

1. aS (assembler) 

2. ed (editor) 

3. Is (disk file directory command) 

4. rm (disk file deletion command) 

5. Stdlib.s (standard library for compiler) 

6. pc (compiler) 

Machine and Compiler: Atari 130XE with 128K memory (8 bit 6502 
microprocessor). 

Kyan Pascal Compiler (ISO Pascal) . 

Input: The six above object files that are to be installed onto the ramdisk, 
need to be in drive 1 when rammit is executed. Lib will need to be © 
available when rammit is executed. Also note that this program 
requires three “include” files from the Kyan Atari System Utilities. 
package in order to operate properly. These three “include” files need 
to be on the same disk as the source code file for rammit when 
rammit is compiled. : 

Output: As the program executes, self explanatory status messages are 
printed on the screen so the program user can track progress of the 
routine. Each message indicates whether the operation was 
successful or not. An error message table at the end heips pinpoint 
an error. The numbers in the table are the standard Atari error 
messages. They are in the same order as the attempted operations. 

Restrictions: This program will only work with Atari computers that have 
ramdisk DISK:COM prior to execution. Two disk drives are also 
required. 
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fe count, (= uty count *) 
otdes ewan Ee Stasi: sts 
26 ad kat bles ie at the | begieairg of a re See ace 

_ things look the same. Everything else you need should be 


Modifications: it is very easy to modtly this program to load different Kyan 
Pascal routines into the ramdisk to customize the environment for a 
particular user. Remember that with string assignments the length of 
the string must match exactly. 

Copyright Notice: Kyan Pascal is a trademark of Kyan Software Inc. *) _ 


type 


pathstring = array [1..20] of char: 

indicator string = array [1..3] of char, 
file array = array [1..8] of pathstring; 
_— _array = array [1. 8} of integer; 


Cy $8 sum of Atari error « messages Mo 
_ array; (* array of the 8 Atari error messages generated *) 


source filename, dest filename : file array; 

ter for DUP.SYS location flag *) 
(* “include” files from Disk Utilities diskette *) 

#i d2:adddev.i 

#i d2:delete.i #1 d2: copy.i- 

begin 

cum. count <= 0; (* initialize cumulative counter *y 

source filename [3] := ‘D1:as ’; : 


source filename [4] := ‘D1: ed"; | 


source filename [5] :< ‘D1:Is *; 
source filename [6] := ‘D1:rm’ ‘ initialize *) 
source filename [7] := ‘D1: stdlib.s *: (* file *) 
source filename [8] := ‘D1:pe '; ¢ names *) 

dest filename [1] := ‘D8: dup. sys’: A oer cee 
dest filename [2] :=‘D&:memsav’; 
dest_filename [3] :- ‘D8:as ’; 


| dest filename m [A] <= ‘DB:ed'; oo oa 


dest_ filename [6] := = ‘DB: rm”: ‘dest. filename > (8) is D8: pe’: 

dos pointer := pointer (5439); (* tell DOS not to look in ramdisk for 
UP.SYS after DUP. SYS *) 

dos_pointer™ := ‘1°; (“ is deleted from the ramdisk (see DOS 2.5 manual) 

-  *) for count := 1 fo 2 do (* delete unneeded files *} 

begin 

status [count] := delete (dest filename [count}): 

cum count := cum count + status [count]; 

if status [count] = { then (* check if operation was successful *) 

indicator := ‘was’ 

else 

indicator := ‘not; : 

writein (dest filename [count}); echo results to screen *) 

writein (indicator, ’ deleted’); 


writein 

end: 

for count = 3 to 8 do (* install files on ramdisk *) 

degin 

status [count] .- copy (source filename (count], dest fiename (count!) 
cum count := cum count + status [count]. 

if status roo = 1 then (* check if operation was successful “} 
indicator = was 

else 


indicator := ‘not: 

writein (source _ filename [count]); (~ echo results to screen *) 
writein (indicator, ’ copied to’); : 
writein (dest_fitename [count]; 

writein 

end; 2 

if cum_count > 8 then (* show error table if there was an error *) 
begin 

writein (Error messages. ); 

for count := 1 to 8 do 

write (status [Count], ° ’); 

writeln 

end: 

end. 


LISTING 2. 


program autoram (input, output); 

(* Author: Rick Reaser, (408) 647-1096 

Date: August 30, 1988 

Description: This program configures the ramdisk On a 130XE to provide 
an efficient environment while programming with Kyan Pascal. The 
program automatically deletes the following files from the ramdisk 
(D8): 

1, dup.sys - 

2.mem.sav 

and installs the following routines in their stead: 


we “Soke =e 


tas 5 (assarnibions 
2 ed (editor) : 
3. Is (disk file acer Conran 
4. rm (disk file deletion command) 
§. stdlib.s (standard library for compiler) 
6. pc (compiler) 
it then loads the KIX environment and banner. 
_ Machine and rola an ia with 128K niece (eo bit 6502 


disk as the source code file for autoram when autoram is 


a routine. Each message indicates whether the operation was 


successful or not. An error message table at the end helps pinpoint : 7 


ari error. The numbers in the table are the standard ! 
_regram nen toads te Tamir HX We screen wit promot. 


ae disk capability. ‘The ramdisk must be initialized by DOS 25 
=. ‘ -RAMDISK.COM prior to execution. Two disk drives are also rt sit 

Modifications: It is very easy tor this program 
Pascal routines int the ramdisk to customize the environment fora 
particular user. Remember that with string assignments the length of 
_ the string must match e y 
- with automake and name it autorun sys as described in the 
manual.) 


Cogyight Notice: Kyan Pascal is a trademark of sy i Software me. a = 


ype 
pathstring = array [1..20] of char; 
indicator string = array [1..3}] of char; 
file array = array [1.8] of pathstring; 
status array = array [1..8] of integer; 


— Var 


count, (* utility counter *) 
cum count : integer: (* sum of Atari error messages *) 


status : status rey (* array of the 8 Atari error messages generated e of 


operation *) 

source filename, dest_filename : file 

dos pointer : “char; (* pointer for DUP. SYS location ioe " 

(* “include” files from Disk Utilities diskette *) 

#i d2:adddev.i 

#i d2:deletei #i d2: copy i 

begin 

cum count := 0; (* initialize cumulative counter “) 

source filename [3] ‘= ‘D1:as ‘; source filename [5] := ‘Dt:is ; (*~- 
= eee *) 

source_ filename [6] := ‘Di:rm *; (* initialize ee 

source filename [7] := ‘D2:stdlib.s ’; (* file *) 

source filename [8] := ‘D1:pc ’; (“ names 2 

dest_filename [1] := ‘D8:dup. sys": £ ae ie 

dest filename [2] := ‘D8:mem.sav ': 


dest filename [3] := ‘D8:as ’; 
dest filename [4] := ‘D8:ed’ 
dest filename [5] := ‘D8:Is’; 
dest filename [6] := ‘D8:rm’; 


dest filename [7] := ‘D8: stdlib. Ss: 

dest filename [8] := ‘D8:pc ': ) 

dos pointer := pointer (5439): 2 tell DOS not to look in the ramdisk for 
‘DUP.SYS after DUP.SYS *) 

dos _pointer* := ‘1’; (* is deleted from the ramdisk (see DOS 2.5 manual) 
* 


for count := 1 to 2 do (* delete unneeded files *) 

begin 

status [count] := delete (dest filename [count]); 

cum count := cum_count + status [count]; 

if status [count] = 1 then (* check if operation was successful “) 
indicator := ‘was’ 

else 

indicator := ‘not’; 

writein (dest_filename [count]); (* echo results to screen *) 
writein (indicator, ' deleted’): 

writein 

end: 

for count := 3 to 8 do (* install files on ramdisk *) 

begin | 

status [count] := copy (source filename [count], dest filename [count}); 
cum_ count := cum_count + status [count]; 


San corsa ("oad 1x envronment Po 


executes, self explanatory status messages — oo 
printed on the sereen so the program user can track progress of the : 

‘wl onty work wit At computers at have me 

to load differen ‘en ae 


ee ee eee ee Aes 


if status s [count - 1 then (* check if cpioraticey 5 successful 1") 


indicator := ‘was’ 

else 2 

indicator := ‘not’: ae 
writein (source _ filename count (* echo results to screen *) 
writein (indicator, ’ copied to y; : 

writein (dest_filename icount 

writein — 

end; 


: if ey core > 8 then « show ¢ error table it there was an error » Pe : 


gir count : ‘= 1t08 do 
one a : & 


by nobody = 


| would like to take this opportunity to thank Greg Knauss 
for the meeting minutes that he submitted in the past few 
issues. Greg started going to college in San Diego this 
quarter and will no longer be able to take the minutes. | 
know that my fellow club members will join me in wishing 


| you the best of luck with your college studies. 


| would also like to thank Daniel Prince for volunteering to 


Start taking the meeting minutes now. 


Greg did not get a chance to write up the last few 
meeting minutes before he left for college s so that is all for 
this column this issue. — editor. 


YOUR ARTICLE 
OR ADVERTISEMENT 
BELONGS HERE !" 


SUBMIT ARTICLES 
ww SHARE 


DATA 213-544-4111.213-542-3112 


i ) | , fen: DATA 818-628-7879 213.379.2800 
Routines You Can Use: eer een 


, DATA 818-629-5400,213-323-3100 
by Dale Bryant — | | DATA 800-925-2424,213-978-5432 


DATA 800-936-3533 213-561-3444 
DATA 213-542-5612,213-478-6256 
DATA 213-482-5423,213-376-0611 


GFA and U: : a nes DATA i Saclay ge Mice 


a iantioned | in the last article that it was possible i find Ke oo es 
= all occurrences of a search phrase within an array. (My PROCEDURE tng roca css” 
apologies to Dale Bryant. It seems that | lost his first two edie omewenes eee 
articles in this series somehow during their downloading jo 


from a local BBS. Dale is working to get me another copy %-0 
of those articles — editor.) if you are looking for one qs 


individual record of course this would not be necessary. biden g eet x s&H18) Press Return to Exit’+CHRS(&H1B 
N # . 2 2 : oe + a 
However, if you had an array with phone numbers it might input “Enter search oe ‘-b$ {Get search phrase Sees 


be nice to find all numbers within a certain area code. ibaa ms Hf alpha make uppercase 
There could be many other applications but | will leave RINT CHRS(aH1B}+"p"#"Phone Numbers "+CHRS(&H1B)+"q" 
those to your imagination. The demo program that — ‘'F LEN(DS)-0 ‘Just RETURN key 


‘ j i : . mc%-=1 !don't look! 
accompanies this article uses an example of finding all aor gage 


phone numbers within a certain area code. The data one ote a. _ 
phone numbers are read from data statements and [oor wan TSS OUF Searen loop 


_again: 
inserted into a string array. Each element of the array agenbalyogt ee 
could also hold a name along with the phone number if srch9ain%. 0) 


you desire. The search could then be on a name or the = srch%(n%,1)-c% 
INC N% 
area code. Remember that this routine finds all occur— INC 1% 
rences of the search phrase. If you search for area code —s PRINT a3(x2%) ‘Display maten 


: : ; iF {%=17 ‘Counter for screen dispiay 
213 with the demo program all occurrences of 213 willbe = y_9 | 


displayed. A phone number in area code 818 containing © — Saha anaea p''+ Press Button or 
213 (818-978-1213 will be displayed along with all pepeap 


numbers prefixed with 213. If this bothers you terribly use patti MOUSEK OR INKEY$<>"" 
the search phrase 213-). PRINT CHRS(&H1B)+"p"+"Phone Numbers © +CHRS(&H1B)+"q" 
ENDIF 
When we get into disk I/O you will see that these routineS = GOTO look agan 
are necessary for the manipulation of records within the = FAUT 
disk data file. With them we can find where each record ON ERROR 
i ; ; ; search done 
resides in the disk file so we can change or delete the = 1%.0 INo match in array 
record. Here is the routine. (Again — indentations are not — PRINT CHR3(&H1B)+p’ +CHRS(&H1B)+ 1 +CHRS(7): 


PRINT b$;" Not Found in File”; 
correct but your program's editor will correct them when PRINT CHRS(&H1B)+"q" +CHRS(&H1B)+"b3” 


typed in. — editor) PAUSE 100 ‘Wait a while 
; : GOTO start_iook ‘Want another look? 
ENDIF 
* LITTLES.LST xX1%=0 
DIM a$(100) !Allow 100 records PRINT 'Display how many found a 
@read_ records ‘Same as GOSUB fe PRINT CHRS(&H1B)+ p +CHRS3(&H1B)+ OT: 
'__...---~---~--PROCEDURE read _ records PRINT n%;"° Records located with ’’:b$. 
record%=1 !Start at record #1 | : PRINT CHRS(&H 1B)+"q"+CHRS(&H1B)}+'b3" 
DO !Read data and 7 PRINT CHRS(&H1B)+'p'+" Press Button or Key +CHRS(&H1B)+ ‘q” 
READ aS(record%) !put into Array REPEAT S 
EXIT IF a$(record%)="*" 'All done UNH MOUSEK OR INKEYS<>’ 
INC record% ‘Our record count CLS 
LOOP !Go read another PRINT 
QSORT aS(),record% !Sort-GFA 3.0 only | f%=0 
DEC record% 'Subtract from count N%=0 
FOR i%=1 TO record% ‘Show records © , : WEND 
PRINT a$(i%) 'on screen ae over: 'Clean up 
NEXT i% my: ae. 
PRINT “Press Any Key to Continue” | N%=0 sity 
VOID INP(2) 'Wait for keypress : ERASE srch%{} 
@find records 'GOSUB CLS 
RETURN !€very Procedure must end with a RETURN ReTU bigs ‘and split 


DATA 213-376-461 1,213-545-1000 


DATA 213-374-9818,213-456-2123 aS PROCEDURE go editor 
| : EDIT 'Back to Editor 


RETURN _ : : ee 
This routine can be very useful in many types of 
programs. If you have GFA type it in and try it. : 
| should state that all of the routines presented are not . 
original with me. As any programmer will do, if | see a 


useful routine | will add it to my library. Why re-invent the : 
wheel? Also there are some good 


_ programming in GFA if yus are interested in neuen ne 
| Have fun waite you: “3 ae a 


Bargain Corner 


by Daniel Prince 


Annoyed with my Volksmodem 12's inconvenient habit of 
answering the phone whenever it is turned on and its lack. 
of a speaker, | decided to get a new 2400 bps modem. As 
usual | looked around for the best price and found two 
models at $125 and one at $119. The two at $125 are the 
Samsung from Amax Applied Technology, Inc., 301—a W. 
Mission Rd., Alhambra, CA 91803 (818) 300-8828 and the 
Smart One from Elco Computers 2 S. Garfield Ave., No. 5, 
Alhambra, Ca 91801 (818) 300-8562. | have looked at both 
of these and read parts of their manuals. They are aimost 
exactly the same except that the Samsung has a black 
case and the other one’s case is white. They both come 
with a two-year warranty, have non-volatile ram (instead 
of switches) to store many of the defaults, have built-in 
speakers, have a fuil complement of indicator lights, and 
neither defauits to answering the phone. | bought the 
Smart One and it has been working fine. 


The $119 modem is a discontinued model (| can't 
remember the name) sold at California Digital Inc, 17700 S. 
Figueroa, Carson 217-0500. It comes with a 90-day— 
warranty, has 4 switches, defaults to answering the phone 
on the fifth ring, has adaptive equalization and error 
correction circuitry. Adaptive equalization means it may 
work better with a bad phone line. | am not sure if the error 
correction circuitry is compatible with any other brand of 
modem or if both modems have to be the same. 


| recently looked around at the Office Club store on 190th 
street just east of Western avenue, next door to the 
Waterbed store. They have quite a few computer related 
items at good prices. One thing | noticed was Epson 
composite green monitors for $53. They also had several 
inexpensive printer stands and lots of computer furniture. 


PS. The Samsung is now $115.00 


books available on _— 


Frogger disk — $3.00 (Disk only) 


6 foot male to centronics male printer cable - 


Classified Ad 


‘Well I think | will take up my own offer and place a 
cleasilind ad here in the Gazette. This Service is alee sea = 
a &-bit Software For Sale: = 
mand cartridge — $2.00 (Carioge On) 


Castle Wolfenstein disk — $6.00 (With instructions) 


: Telengard disk — $3.00 (With instructions) 


Omnitrend’s Universe disk — $20.00 (Compiete package) 

Questron disk - $10.00 (Complete package) : 
Hardware: 

$16. 00 


Contact Bill Little at (213)217-0725 if you are interested 
in any of the above items. ! will have these at the next few 
General meetings also 


tat 
; Ae hes 


: SEE THE AD 
L ABOVE 


j ; 
a= A service brought to you 


| by the S.B.A.C.E. Gazette 
and its editor. 
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BOLT'S ELECTR 


- 15737 LEMARSH STREET, SEPULVEDA, CA 91343 (818) 893-9664 


FACTORY AUTHORIZED SALES AND SERVICE FOR ATARI 
_ "COMPUTER SYSTEMS AND DISK DRIVES: 


800 ¢ 800 XL © 130-XE © 810 © 1050 © 850 


__ AND COMPLETE SALES AND SERVICE FOR § Tf OMPUTER SYSTEMS 


. : | INCLUDES: DISK DRIVE—MONITOR— 
520°" Nae Cone CALL MOUSE-GEM/TOS Operating System (in 


TOADS ASE COLOR SYSTEMEALL man" so0m Warany 


ONE MEGABYTE MEMORY UPGRADE—$180.00 
~4-YEAR EXTENDED ‘ SERVICE WARRANTY—$180. 00 Et 


ICE ts the ongest bh she : heat ae AY VERACE Aine 


equipped and most experrenced including Parts a ate Records 
ATARI SERNICE CENTER in Southern an Fier 90 Day V2 syrty oe as 


Cahforma Since 1979. we have Serv Semvece 
ced and recaned over r 6G00 ATARI 


ee... 
See... 
aan aeRO QUALITY SERVICE WITH INTEGRITY—WE CARE 


¢SALES Most Major Software & Accessories 
* SERVICE Prompt! All Work Guaranteed 


fy USTOMIZED TO SUIT YOUR APPLICATION 


om Fo rcomes. INC. 
OUR 2ND LOCATION 

=| 2018 - #1 W. LOMITA BLVD. STORE HOURS: 
LOMITA 90717 | MON-FRI 9- 6 SAT 10-5 


RESISTOR 'S DIODES MONITORS PRINTERS TRACTOR FEED COMPUTERS DISK DRIVES HARD DRIVES “ODEMS BOARDS TAPE DRIVES 0: SKETTES JOYSTICK SOFTWARE 


POWER SUPPLIES Ba a ae a 


BOOKS WIRE-WRAP BOARDS BATTERIES FANS 


ae 


me or send me a postcard and | will bring that issue to the 


MAGAZINE LIBRARYNEWS = = ~—_ ADVERTISING RATES 
by Daniel Prince ie ne Full page (8.5” by 11”) $25.00 — 
The SBACE magazine library contains numerous Atari } Half page $15.00 


magazines including most editions of Analog, Antic, Res! a | 
Explorer, Byte, Compute, Page 6, plus many others. oe cae a Eee $8.00 s 
“If you want to borrow one of the club's magazines, Cc os Business card size $5.00 — 


next SBACE meeting. | am going to try to bring some ace 
the more recent issues to each Lei, from | now on. one ae oa : 
a “We may y be able to aceon merchandise in exchange “ 


Daniel Prince ads. Please call the editor for details. 


5200 Marathon #207 
“Los Angeles, CA 90038 
(213)465-2364 


Send camera—ready copy with payment to: 
Bill Little c/o S.B.A.C.E. 
- P.O. Box 83668 
_ Los Angeles, CA 90083 


The material and opinions in this Gazette are : those of the individual author and 
do not necessarily reflect the opinions of the South Bay Atari Computer 


Enthusiasts. The material in this Gazette may be copied by any other User group 
providing credit is given to the authors. 


S.B.A.C.E. 
SOUTH BAY ATARI COMPUTER ENTHUSIASTS 
Please address all cormaapendence to: 
S.B.A.C.E. 
P.O. Box 83668 
Los Angeles, CA 90083 


SERCE GAZETTE is not affiliated with ATARI Corporation. 
ATARI is a trademark of ATARI Corporation. 


